home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / c / Vmalloc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-07  |  2.0 KB  |  102 lines
  1. Changes file for /usr/local/src/kcl/c/malloc.c
  2. Created on Tue Oct 24 20:01:59 1989
  3. Usage \n@s[Original text\n@s|Replacement Text\n@s]
  4. See the file rascal.ics.utexas.edu:/usr2/ftp/merge.c
  5. for a program to merge change files.  Anything not between
  6. "\n@s[" and  "\n@s]" is a simply a comment.
  7. This file was constructed using emacs and  merge.el
  8. Enhancements Copyright (c) W. Schelter All rights reserved.
  9.    by (Bill Schelter)  wfs@carl.ma.utexas.edu 
  10.  
  11.  
  12. ****Change:(orig (131 131 c))
  13. @s[ * if the power of 2 is correct.
  14.  */
  15.  
  16.  
  17. @s| * if the power of 2 is correct.
  18.  */
  19. /*  Oct 89: wfs@cs.utexas.edu:  Created  V/ merge file for
  20.  * changes for GCL.
  21.  * Calls to sbrk replaced by alloc_page.   Remove some of the
  22.  * additions for emacs.
  23.  * NB:  According to the gnu license you may only distribute the
  24.  * verbatim copy of the gnumalloc.c.   Thus we only distribute
  25.  * an abbreviated diffs file from that verbatim copy.
  26. */
  27.  
  28. @s]
  29.  
  30.  
  31. ****Change:(orig (162 162 c))
  32. @s[#include "getpagesize.h"
  33.  
  34. @s|#define getpagesize() 2048
  35.  
  36. @s]
  37.  
  38.  
  39. ****Change:(orig (170 170 c))
  40. @s[#include <sys/resource.h>
  41.  
  42. @s|/* #include <sys/resource.h> */
  43.  
  44. @s]
  45.  
  46.  
  47. ****Change:(orig (202 202 a))
  48. @s[static char *data_space_start;
  49.  
  50.  
  51. @s|static char *data_space_start;
  52.  
  53. #define PAGEWIDTH 11
  54. char *alloc_page();
  55. #define sbrk our_sbrk
  56. char *
  57. our_sbrk(x)
  58. int x;
  59. {return alloc_page((x >> PAGEWIDTH));}
  60.  
  61.  
  62.  
  63.  
  64.  
  65. @s]
  66.  
  67.  
  68. ****Change:(orig (338 378 d))
  69. @s[#ifndef VMS
  70.   /* Maximum virtual memory on VMS is difficult to calculate since it
  71.    * depends on several dynmacially changing things. Also, alignment
  72.    * isn't that important. That is why much of the code here is ifdef'ed
  73.  
  74. @s,    sbrk (1024 - ((int) cp & 0x3ff));
  75. #endif /* not VMS */
  76.  
  77.  
  78. @s|
  79. @s]
  80.  
  81.  
  82. ****Change:(orig (385 385 c))
  83. @s[  if ((cp = sbrk (1 << (siz + 3))) == (char *) -1)
  84.  
  85. @s|  if ((cp = sbrk (1 << (siz + 3)))==0)
  86.  
  87. @s]
  88.  
  89.  
  90. ****Change:(orig (387 393 d))
  91. @s[#ifndef VMS
  92.   if ((int) cp & 7)
  93.     {        /* shouldn't happen, but just in case */
  94.       cp = (char *) (((int) cp + 8) & ~7);
  95.  
  96. @s,    }
  97. #endif /* not VMS */
  98.  
  99. @s|
  100. @s]
  101.  
  102.